|
AutoCAD VBA : Layout oder Modell
CADmium am 28.08.2008 um 08:19 Uhr (0)
...Die systemvariable CTAB liefert die das aktuelle Layout.du kannst die einzelnen Layouts der Layoutcollectione der aktuellen Zeichnung durchlaufen ... deren "Block" ermitteln und dessen Property COUNT abfragen ... dann kennst du die Anzahl der Objekte in jedem Layout und kannst dann darauf schließen wo gezeichnet wurde------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Objekte an Layout binden??
CADmium am 25.03.2008 um 12:40 Uhr (0)
.. die Ansichtsfenster haben geben jeweils nur eine gewissen Höhenschicht wieder ...entsperr mal die Ansicht... stell mal ucsfollow auf 1 .. ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Verfügbare Blattgrössen von bestimmten Drucker
CADmium am 10.01.2008 um 10:19 Uhr (0)
1.aktives Layout ermitteln2.Drucker und Paper des aktiven Layout merken3.zu untersuchenden Drucker im aktiven Layout setzen4.RefreshPlotDeviceInfo fürs aktive Layout aufrufen5.Medianames mit GetCanonicalMediaNames auswerten6.für jedes Medianame -Papiername mit GetLocaleMediaName auslesen mit RefreshPlotDeviceInfo System refreshen -Papiergröße mit GetPaperSize auslesen7.Einstellungen aus 2. zurückspeichernfertig------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Probl ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : umschalten auf Layout nach Namen
CADmium am 06.12.2006 um 09:40 Uhr (0)
durch setzen des SYSVAR "CTAB" kannst du aufs entsprechende Layout wechseln------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Plot auf Layout anwenden
CADmium am 16.10.2008 um 16:00 Uhr (0)
arbeite mit benannten Seiteneinstellungen. Die kann man auch aus ner Vorlage importieren und auch einem Layout zuweisen..geht IMHO am schnellsten.------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Anzahl von Layout / 2 von 25
CADmium am 07.01.2011 um 13:31 Uhr (0)
Zitat:Original erstellt von runkelruebe:Hi,warum nicht einfach so: Code:Debug.Print ThisDrawing.Layouts(i).Name & " = Layout Nr. " & i & " von " & ThisDrawing.Layouts.Count & " Layouts"weil IMHO das die i die Erstellreihenfolge und nicht die Tabreihenfolge repräsentiert !------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Anzahl von Layout / 2 von 25
CADmium am 07.01.2011 um 13:12 Uhr (0)
Für die Anzahl pack dir das auf einen Button:(alert (strcat "Die Zeichnung enthält "(itoa(length(layoutlist))) " Paperlayout(s)"))für die Nummer guck dir die Property TABORDER des LAyouts an .. z.B.(alert (strcat "Layout " (itoa(vla-get-taborder (vla-get-activelayout (vla-get-activedocument(vlax-get-acad-object)) ) ) ) " von " (itoa(length(layoutlist))) " Layouts" )) ------------------ - Thomas - "Be ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : vorhandene Bemassungen ändern
CADmium am 02.12.2004 um 13:07 Uhr (0)
dann nimm dies ( auch wenn es Lisp ist) (defun PUTPRECISION(Precision / BLOCK ) (vl-load-com) (vlax-for LAYOUT (vla-get-layouts(vla-get-activedocument(vlax-get-acad-object))) (vlax-for ITEM (setq BLOCK (vla-get-Block LAYOUT)) (if(wcmatch (strcase AcDbRotatedDimension ) *DIMENSION* ) (vl-catch-all-error-p (vl-catch-all-apply vla-put-PrimaryUnitsPrecision (list ITEM Precision) ) ) ) ) ) (vla-regen(vla-get-actived ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Layout kopieren
CADmium am 11.02.2011 um 09:34 Uhr (0)
naja .. googeln ist auch Eigeninitiative ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Layout kopieren
CADmium am 11.02.2011 um 08:20 Uhr (0)
ungetestet, aber was ist mit der Methode CopyObjects des Documents ?------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Layout kopieren
CADmium am 11.02.2011 um 08:51 Uhr (0)
ich verweis mal auf F1 und Eigeninitiative .. du wolltest n Tipp , kein fertiges Programm ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Material herauslesen
CADmium am 18.10.2006 um 16:45 Uhr (0)
die Blattgröße kannst du durch auslesen der Sysvars LIMMIN / LIMMAX im Layout erhalten.. aber auch im entsprechenden Dictionary findest du die gespeicherten Werte..Zum Maßstab... der hängt eigentlich an den einzelnen Viewports, aber vielleicht hilft dir (amggetdwgsetting "SCALE") für die Befehlszeile weiter...------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Mittels VBA den Layoutnamen ändern ?
CADmium am 11.03.2010 um 18:56 Uhr (0)
ohne Ahnung von VBA zu habenIf ThisDrawing.ActiveLayout.ModelType = False Then ThisDrawing.ActiveLayout.Name = TextBox9.TextEnd Ifoder halt an anderer Stell in deinem Code ALayout.NAME das eine ist die Layoutcollection- da kann man kein NAme zuweisen, das andere das aktuelle Layout.------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
